home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_mc.idb / usr / freeware / lib / mc / extfs / lslR.z / lslR
Encoding:
Text File  |  1998-10-28  |  635 b   |  42 lines
  1. #! /bin/sh
  2. FILE=file
  3. ZCAT="gunzip -c"
  4. CAT=cat
  5.  
  6. mclslRfs_list ()
  7. {
  8. MYCAT="$CAT"
  9. case "$1" in
  10.     *.gz) MYCAT="$ZCAT";;
  11.     *.z) MYCAT="$ZCAT";;
  12.     *.Z) MYCAT="$ZCAT";;
  13. esac
  14.     $MYCAT $1 | nawk '
  15. BEGIN { dir="" }
  16. /^total\ [0-9]*$/ { next }
  17. /^$/ { next }
  18. /^[^\ \    ]*:$/ {
  19. if ($0 ~ /^\//)
  20.     dir=substr($0, 2)
  21. else
  22.     dir=$0
  23. if (dir ~ /\/:$/)
  24.     sub(/:$/, "", dir)
  25. else
  26.     sub(/:$/, "/", dir)
  27. next
  28. }
  29. { 
  30. printf "%s %3d %-8s %-8s %8d %3s %2d %5s %s%s", $1, $2, $3, $4, $5, $6, $7, $8, dir, $9
  31. if (NF > 9)
  32.     printf " %s %s\n", $10, $11
  33. else
  34.     printf "\n"
  35. }' 2>/dev/null
  36. }
  37.  
  38. case "$1" in
  39.   list) mclslRfs_list $2; exit 0;;
  40. esac
  41. exit 1
  42.